home *** CD-ROM | disk | FTP | other *** search
- object CustomCommandDialog: TCustomCommandDialog
- Left = 384
- Top = 214
- HelpType = htKeyword
- HelpKeyword = 'ui_customcommand'
- BorderIcons = [biSystemMenu, biMinimize, biMaximize, biHelp]
- BorderStyle = bsDialog
- Caption = 'CustomCommandDialog'
- ClientHeight = 305
- ClientWidth = 396
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poMainFormCenter
- OnCloseQuery = FormCloseQuery
- OnShow = FormShow
- DesignSize = (
- 396
- 305)
- PixelsPerInch = 96
- TextHeight = 13
- object Group: TXPGroupBox
- Left = 8
- Top = 8
- Width = 380
- Height = 255
- Anchors = [akLeft, akTop, akRight, akBottom]
- TabOrder = 0
- DesignSize = (
- 380
- 255)
- object FileNameLabel: TLabel
- Left = 11
- Top = 16
- Width = 56
- Height = 13
- Anchors = [akLeft, akTop, akRight]
- Caption = '&Description:'
- FocusControl = DescriptionEdit
- end
- object Label1: TLabel
- Left = 11
- Top = 64
- Width = 87
- Height = 13
- Anchors = [akLeft, akTop, akRight]
- Caption = '&Custom command:'
- FocusControl = CommandEdit
- end
- object CustomCommandsPatternsLabel: TLabel
- Left = 16
- Top = 189
- Width = 353
- Height = 61
- Anchors = [akLeft, akTop, akRight, akBottom]
- AutoSize = False
- Caption =
- 'Patterns:'#160'!!'#160'-'#160'exclamation mark; !'#160'-'#160'file name; !?prompt?default' +
- '!'#160'-'#160'prompts user for parameter value; !&&'#160'-'#160'selected files list'#160 +
- '(quoted, space-delimited)'#13#10'Local command patterns: !^!'#160'-'#160'file na' +
- 'me from local panel'
- WordWrap = True
- end
- object DescriptionEdit: TEdit
- Left = 11
- Top = 32
- Width = 358
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 250
- TabOrder = 0
- OnChange = ControlChange
- end
- object CommandEdit: TEdit
- Left = 11
- Top = 80
- Width = 358
- Height = 21
- Anchors = [akLeft, akTop, akRight]
- MaxLength = 250
- TabOrder = 1
- OnChange = ControlChange
- OnKeyDown = PathEditsKeyDown
- end
- object ApplyToDirectoriesCheck: TCheckBox
- Left = 16
- Top = 136
- Width = 145
- Height = 17
- Caption = '&Apply to directories'
- TabOrder = 4
- OnClick = ControlChange
- end
- object RecursiveCheck: TCheckBox
- Left = 184
- Top = 136
- Width = 145
- Height = 17
- Caption = '&Execute recursively'
- TabOrder = 5
- OnClick = ControlChange
- end
- object LocalCommandButton: TRadioButton
- Left = 184
- Top = 109
- Width = 161
- Height = 17
- Caption = '&Local command'
- TabOrder = 3
- OnClick = ControlChange
- end
- object RemoteCommandButton: TRadioButton
- Left = 16
- Top = 109
- Width = 161
- Height = 17
- Caption = '&Remote command'
- TabOrder = 2
- OnClick = ControlChange
- end
- object ShowResultsCheck: TCheckBox
- Left = 16
- Top = 163
- Width = 353
- Height = 17
- Caption = '&Show results in terminal'
- TabOrder = 6
- OnClick = ControlChange
- end
- end
- object OkButton: TButton
- Left = 228
- Top = 272
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 1
- end
- object CancelButton: TButton
- Left = 312
- Top = 272
- Width = 75
- Height = 25
- Anchors = [akRight, akBottom]
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 2
- end
- end
-